
#Include "fbstrings.bi"

Using FB.Strings

Dim As String s = "The quick brown fox jumps over lazy dog."

Dim As String find(0 To 4) => { "a", "e", "i", "o", "u" }

Print StrReplace(s, find(), "?")

Sleep